home *** CD-ROM | disk | FTP | other *** search
/ Almathera Ten Pack 3: CDPD 3 / Almathera Ten on Ten - Disc 3: CDPD3.iso / ab20 / ab20_archive / games / strategy / madgic-corewar-4.0.lzh / 1987 / VAMPSPRD.S < prev    next >
Text File  |  1988-07-09  |  1KB  |  40 lines
  1. ;      VAMPSPRD.S
  2. ;      JON NEWMAN
  3. ;
  4. INIT           JMP     CLOOP
  5. COUNT          DAT     10
  6. CLOOP          MOV     @SOURCE,        <DEST
  7.                DJN     CLOOP,          SOURCE
  8.                ADD     #3,             DEST
  9.                JMP     3
  10. BLANK1         DAT     0
  11. BLANK2         DAT     0
  12.                SPL     @DEST
  13.                MOV     #19,            SOURCE
  14.                ADD     #1416,          DEST
  15.                DJN     CLOOP,          COUNT
  16. DEST           DAT     1421
  17. SOURCE         DAT     19
  18. BLANK3         DAT     0
  19. BLANK4         DAT     0
  20. TARGET         DAT     -1401
  21. BOMBLOOP       MOV     BITE,           @TARGET
  22.                MOV     FANG,           <TARGET
  23.                ADD     #632,           BITE
  24.                SUB     #631,           TARGET
  25.                JMP     BOMBLOOP
  26. BLANK5         DAT     0
  27. BLANK6         DAT     0
  28. BITE           DAT     1410
  29. TRAP           MOV     #-18,           TTARG
  30.                MOV     #-7,            PURGE
  31. TRAPLOOP       MOV     #-18,           <TTARG
  32.                SPL     @PURGE
  33.                JMP     @PURGE
  34. BLANK7         DAT     0
  35. BLANK8         DAT     0
  36. FANG           JMP     @1
  37. TTARG          DAT     -18
  38. PURGE          DAT     -7
  39.                END
  40.